object FNetTest: TFNetTest Left = 239 Top = 208 HorzScrollBar.Visible = False VertScrollBar.Visible = False BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'Network and Firewall Test' ClientHeight = 245 ClientWidth = 427 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter Scaled = False OnClose = FormClose OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object tFail: TLabel Left = 208 Top = 224 Width = 19 Height = 13 Caption = 'tFail' Visible = False end object Btest: TButton Left = 15 Top = 215 Width = 75 Height = 23 Caption = 'Test' TabOrder = 0 OnClick = BtestClick end object BNext: TButton Left = 105 Top = 215 Width = 75 Height = 23 Caption = 'Finish' TabOrder = 1 OnClick = BNextClick end object BCancel: TButton Left = 340 Top = 215 Width = 75 Height = 23 Caption = 'Cancel' TabOrder = 2 OnClick = BCancelClick end object Memo1: TMemo Left = 15 Top = 5 Width = 404 Height = 132 TabStop = False BorderStyle = bsNone Color = clBtnFace Ctl3D = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'This test checks if your network is working properly and that ' 'you are not behind a firewall.' '' 'When you press the Test button below, we will attempt to set ' 'up a connection to the Net2Phone servers.' '' 'The results of the connection will be displayed below:') ParentCtl3D = False ParentFont = False TabOrder = 3 end object Panel1: TPanel Left = 8 Top = 152 Width = 417 Height = 57 BevelOuter = bvNone TabOrder = 4 object Ltest: TLabel Left = 7 Top = 42 Width = 394 Height = 13 AutoSize = False Caption = 'Testing. Please Wait.......' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Visible = False WordWrap = True end object LFail: TLabel Left = 7 Top = 25 Width = 393 Height = 26 Caption = 'Test Failed: Either you are not connected to the internet, are ' + 'behind a firewall, or have some other network problem.' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Visible = False WordWrap = True end object LPass: TLabel Left = 7 Top = 0 Width = 397 Height = 26 Caption = 'Test Passed. You can sucessfully use Net2Phone on this computer' + '. Click FINISH below to complete the wizard.' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Visible = False WordWrap = True end end end